home *** CD-ROM | disk | FTP | other *** search
/ Shareware Games Galore! / Shareware Games Galore!.iso / arcade / corewars / lichen4.rdc < prev    next >
Text File  |  1989-04-28  |  257b  |  12 lines
  1. ; LICHEN4
  2. ; TCWN Spring 1988
  3.  
  4. START    SPL    1        ; Double task
  5.     SPL    DUMB        ; keep same * 2
  6. SOURCE    MOV    #4,0        ; Write to B-field
  7.     MOV    #17,DEST    ; difference
  8.     MOV    <SOURCE,<DEST    ; Copy program
  9. DEST    JMP    @0        ; Split up here
  10. DUMB    JMP    SOURCE        ; Dummy wait
  11.     END
  12.